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IN THE UNITED STATES PATENT AND TRADEMARK OFFICE 



In re Patent Application of: 
Weinstein et al. 



Application No.: 09/546052 



Art Unit: 2665 



Filed: April 10,2000 



Examiner: T. D. Nguyen 



For: RADIO NETWORK ROUTING APPARATUS 



DECLARAT ION UNDER 37 C.F.R. § 1.131 



I, Joseph J. Weinstein, do hereby declare as follows: 

I am one of the inventors of the subject matter claimed and described in the above 
referenced patent application. 

I discussed the legal meaning of the terms "conceived" and "reduced to practice" with m> 
attorney. Based on my understanding of those terms derived from that discussion, I, with 
my coinventors, conceived of and reduced to practice, in the United States, the subject 
matter of the pending claims prior to November 12, 1999. 

The computer source code, attached as Exhibit A, was entered into the code archive 
system of Assignee, BBNT Solutions LLC, prior to November 12, 1999. Dates, 
comments, and copyright information have been redacted from the source code. The 
source code illustrates the relevant portions of a computer program as described in claims 
46-54 that carries out the methods described in claims 21-28. Such code was operated 
on at least one router prior to November 12, 1999, as described in claims 37-45 to yield a 
system described in claims 29-36. The code illustrates one embodiment of the invention 
and is not intended to narrow the scope of the claims. 



. In particular, the attached code includes the following functions and procedures: 
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a, rospfjDpen_fwd_connection, rospf^closejfad^connnection, 
rospf^etjntranet Jopology, ro$pflgetjiext_entry, together enable a router to 
obtain lower layer topology information from a lower layer protocol, in this case, 
the NTDR (near term digital radio) protocol. 

b, ospf_state$,c, a modified version of the ospf_states,c file from the GATED 
consortium, calls the rospf_get_intranet Jopology and rospfjetjiext^entry 
routines to use in forming higher layer protocol (in this case the OSPF protocol) 
adjacencies* 

c, tq_ntdr JWdJiandler provides for a timer for initiating a periodic higher layer 
protocol adjacency updating process which includes obtaining updated lower 
layer protocol topology information. 

5. 1 assert that all statements made of my own knowledge are true, and that all statements 
made on information and belief are believed to be true. I also under$tand that willful 
false statements and the like are punishable by fine or imprisonment, or both (18 tIS.C 
§ 1001) and may jeopardize the validity of the application or any patent issuing thereon. 



Dated: 
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#ifhdef ROSPFF WD_INTERF ACE_H 
#define ROSPFFWDINTERFACEH 

#include "include.h" 

#ifdefROSPF 
#include <syst/nfwd.h> 

#define ROSPFMAXNETSIZE 1023 
#defme ROSPF_AVG_NET_SIZE 200 

boolean t rospf_open_fwd_connection(struct INTF * inlntf); 
void rospf_close_fwd_connection(struct INTF * inlntf); 

boolean_t rospf_get_intranet_topology(struct INTF * inlntf); 
void rospf_reset_intranet_topology(void) ; 

boolean_t rospf_get_next_entry(struct INTF * inlntf,nfwd_flag_desc_t ** outEntry); 

struct NBR * rospf_find_nbr_by_addr(struct INTF * inlntf, u_int32 inNbrAddr); 

struct NBR * rospf_find_nbr_by_id(struct INTF * inlntf, u_int32 inNbrld); 

nfwd flag desc t * rospf_find_entry_by_addr(struct INTF * inlntf,u_int32 inNbrAddr); 

u_int32 ROSPF_CONVERT_MAC_TO_IP(stract INTF * inlntf,u_int32 inMac); 
u_int32 ROSPF_CONVERT_IP_TO_MAC(struct INTF * inlntf,u_int32 inlp); 

void rospf_save_cluster_role(struct NBR * inNbr,nfwd_flag_desc_t * inRoute); 
boolean_t rospf_is_role_different(struct NBR * inNbr,nfwd_flag_desc_t * inNode); 



#endif 
#endif 
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#include "include.h" 
#include "ospf.h" 
#include "inet.h" 



REDACTED 



#ifdefROSPF 

#define ROSPFDEBUG 1 

#include ,! rospf_fwd_interface.h H 
#include <stropts.h> 
#include <sys/types.h> 
#include <syst/nfwd.h> 
#include <syst/ntdr_stropts.h> 
#include <fcntl.h> 

static struct strioctl sloctl; 
*/ 

static nfwd_get_flags_t * sBuffer = NULL; 
table */ 



/* structure used for polling NTDR forwarding table 
/* buffer to hold polled NTDR Forwarding 



static int 
static int 
sBuffer */ 
static int 



sCurlndex =-1; 
sNumElements = 0; 

sBufferSize = 0; 



/* current element in sBuffer being used */ 
/* current number of elements(neighbors) in 

/* Capacity (in neighbors) of sBuffer */ 



int compute_size(int inNumElements) 

{ 

return (sizeof(nfwd_get_flags_t) + ( (inNumElements- 1) * sizeof(nfwd_flag_desc_t) ) ); 

} 



boolean_t rospf_open_rwd_connection(struct INTF * inlntf) 

{ 

trace_tf(ospf.trace_options, 
TR_ROSPF, 

0, 

("ROSPF: opening connection to ntdr forwarding module: %s", 
inIntf->rospf_fwd_dev)) ; 

if ( (inIntf->rospf_fwd_fd = open(inIntf->rospf_fwd_dev,0_RDWR)) < 0 ) 
{ 

trace_log_tf(ospftrace_options, 
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o, 

LOG_WARNING, 
("ROSPF: Open failed on device %s", 
inIntf->rospf_fwd_dev)); 
assert(FALSE); 

} 

if(sBuffer = NULL) 
{ 

trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Allocating Buffer for ntdr forwarding Table")); 
sBufferSize = ROSPF_AVG_NET_SIZE; 

sBuffer = (nfwd_get_flags_t *) task_mem_malloc(NULL,compute_size(sBufferSize)); 
assert(sBuffer!=NULL); 

} 

return(B_TRUE); 

} 



void rospf_close_fwd_connection(struct INTF * inlntf) 

{ 

close(inIntf->rospf_fwd_fd); 

} 



boolean_t rospf_get_intranet_topology(struct INTF * inlntf) 

{ 

booleanj isDone; 
int theNumEntries; 



isDone = BFALSE; 

while (isDone = B FALSE) 
{ 

sIoctl.ic_cmd = nfwd_GET_ALL_FL AGS ; 
sIoctl.ic_timout = 10; 

sloctl . ic_len = compute_size(sBufferSize) ; 
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sIoctl.ic_dp = (char *) sBuffer; 



if ( (ioctl(inIntf->rospf_fwd_fd,I_STR,&sIoctl) != 0) && 
( sBuffer->nentries <= sBufferSize ) ) 

{ 

trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: ioctl failed for getting forwarding table ")); 
assert(FALSE); 



if ( sBuffer->nentries > sBufferSize ) 

{ 

trace_tf(ospf.trace_options, 
TR_ROSPF, 

0, ^ 
("ROSPF: ioctl failed, buffer too small, nentries: %d sBufferSize:%d, re- 
allocating", 

sBuffer->nentries,sBufferSize)); 
theNumEntries = sBuffer->nentries; 
task_mem_free((task *) NULL,sBuffer); sBuffer = NULL; 

sBufferSize = theNumEntries + ( (ROSPF_MAX_NET_SIZE - theNumEntries) / 2 ); 

sBuffer = task_mem_malloc((task *)NULL,compute_size(sBufferSize)); 
assert(sBuffer != NULL); 

} 



trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: forwarding table has %d entries", 
sBuffer->nentries)); 

isDone = B_TRUE; 
sCurlndex =-1; 

sNumElements = sBuffer->nentries; 

} 



return(B_TRUE); 

} 
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void rospf_reset_intranet_topology(void) 

{ 

sCurlndex =-1; 

} 



boolean_t rospf_get_next_entry(struct INTF * inlntf,nfwd_flag_desc_t ** outEntry) 

{ 

boolean_t isDone; 

isDone = B_FALSE; 

while (isDone = BFALSE) 
{ 

sCurIndex++; 

if (sCurlndex >= sNumElements) 

{ 

return(B_FALSE); 

} 

if((sBuffer->entries[sCurIndex]. flags & nfwd_rlflags_NBR_DIRECT) && 
(sBuffer->entries[sCurIndex].flags & nfwd_rlflags_NBR_MEMBER) && 
(sBuffer->entries[sCurIndex]. flags & nfwd rlflags CURNODE MEMBER ) ) 
{ 

5 

} 

else 

{ 

isDone = BTRUE; 

*outEntry = &sBuffer->entries[sCurIndex]; 
return(B_TRUE); 

} 

} 

} 



struct NBR * rospf_find_nbr_by_id(struct INTF * inlntf, u_int32 inNbrld) 

{ 

struct NBR * theCurNbr; 

struct LSDB HEAD * theHead; 

struct LSDB * theCurAdv; 

struct RTR LA PIECES * theCurAdvIntf; 

int theCurlntflndex; 



96570I6_1 



-4- 



int thelntflndexMax; 
booleant foundAdv = BFALSE; 

struct RTR_LA_HDR * theAdvHeader; 



theCurNbr = FirstNbr(inlnti); 
while (theCurNbr != NULL) 

{ 

if ( NBRID(theCurNbr) == inNbrld) 
{ 

return(theCurNbr) ; 

} 

theCurNbr = theCurNbr->next; 

} 



LSDB_HEAD_LIST(inIntf->area->htbl[LS_RTR], theHead, 0, HTBLSIZE) 
{ 

LSDB_LIST(theHead, theCurAdv) 

{ 

theAdvHeader = (struct RTR LA HDR *) theCurAdv->lsdb_adv.rtr; 

if ( (inNbrld = ADV RTR(theCurAdv)) && (theAdvHeader->ls_hdr.ls_type = 
LSRTR) ) 

{ 

theCurlntflndex = 0; 

theCurAdvIntf = & theAdvHeader->link; 
while (theCurlntflndex < ntohs(theAdvHeader->lnk_cnt) ) 
{ 

if ((theCurAdvIntf->lnk_data & INTF_MASK(inIntf)) = 
ENTF_NET(inIntf)) 

{ 

foundAdv - B TRUE; 

#ifdef ROSPFDEBUG 

trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Adv found in database. theCurAdvIntf. lnkjd %A 

lnk_data %A rtr_id %A", 

sockbuild_in(0,theCurAdvIntf->lnk_id), 
sockbuild_in(0,theCurAdvIntf->lnk_data), 
sockbuild_in(0, ADV RTR(theCurAdv)))); 

#endif 

break; 

} 
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theCurIntflndex++; 
theCurAdvIntf++; 

} 

} 

if ( foundAdv == BTRUE) 
{ 

break; 

} 

} LSDB_LIST_END(theHead, theCurAdv) ; 

if ( foundAdv == B TRUE) 

{ 

break; 

} 

} LSDB_HEAD_LIST_END(inIntf->area->htbl[LS_RTR], theHead, 0, HTBLSIZE) ; 



if (! foundAdv) return(NULL); 

#ifdef ROSPFDEBUG 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Adv found in database. theCurAdvIntf. lnk_id %A lnk_data %A rtr_id %A", 

sockbuild_in(0,theCurAdvIntf->lnk_id), 

sockbuild_in(0, AD V_RTR(theCur Ad v)))) ; 

#endif 

theCurNbr = FirstNbr(inlntf); 
while (theCurNbr != NULL) 

{ 

if (NBRADDR(theCurNbr) == theCurAdvIntf->lnk_data) 

{ 

theCurNbr->nbr_id 

sockdup(sockbuild_in(0, ADV_RTR(theCurAdv))); 
ospf_nbr_remove(inIntf, theCurNbr); 
ospf_nbr_add(inIntf, theCurNbr); 
#ifdef ROSPFDEBUG 

trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: NBR found nbr_id %A nbr_add %A 
theCurNbr->nbr_id,theCurNbr->nbr_addr)); 

#endif 

return(theCurNbr); 
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} 

theCurNbr = theCurNbr->next; 

} 

return(NULL); 

} 



struct NBR * rospf_find_nbr_by_addr(struct INTF * inlntf, u_int32 inNbrAddr) 

{ 

struct NBR * theCurNbr; 

struct LSDBHEAD * theHead; 

struct LSDB * theCurAdv; 

struct RTR_LA_PIECES * theCurAdvIntf; 

int theCurlntflndex; 

int thelntflndexMax; 

booleanj foundAdv = BFALSE; 

struct RTR_LA_HDR * theAdvHeader; 



theCurNbr = FirstNbr(inIntf); 
while (theCurNbr != NULL) 
{ 

if ( NBRADDR(theCurNbr) = inNbrAddr) 
{ 

return(theCurNbr); 

} 

theCurNbr = theCurNbr->next; 

} 



LSDB_HEAD_LIST(inIntf->area->htbl[LS_RTR], theHead, 0, HTBLSIZE) 
{ 

LSDB_LIST(theHead, theCurAdv) 
{ 

theAdvHeader = (struct RTR LA HDR *) theCurAdv->lsdb_adv.rtr; 

if (theAdvHeader->ls_hdr.ls_type = LSRTR) 
{ 

theCurlntflndex = 0; 

theCurAdvIntf = «&theAdvHeader->link; 

while (theCurlntflndex < ntohs(theAdvHeader->lnk_cnt) ) 
{ 
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if (theCurAdvIntf->lnk_data = inNbrAddr) 

{ 

#ifdef ROSPFDEBUG 

trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: find nbr by addr - Adv found in database. theCurAdvIntf 
lnk_id %A lnk_data %A rtr_id %A", 

sockbuild_in(0,theCurAdvIntf->lnk_id), 
sockbuild_in(0,theCurAdvIntf->lnk_data), 
sockbuild_in(0, AD V_RTR(theCur Adv)))) ; 

#endif 

foundAdv = BTRUE; 
break; 

} 

theCurIntffndex++; 
theCurAdvIntf++; 

} 

} 

if ( foundAdv = BTRUE) 
{ 

break; 

} 

} LSDB_LIST_END(theHead, theCurAdv) ; 

if ( foundAdv = BTRUE) 
{ 

break; 

} 

} LSDB_HE AD_LIST_END(inIntf->area->htbl [LS_RTR] , theHead, 0, HTBLSIZE) ; 



if (IfoundAdv) return(NULL); 

#ifdef ROSPFDEBUG 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: find nbr by addr - Adv found in database. theCurAdvIntf lnk_id %A 
lnk_data %A rtrid %A", 

sockbuild_in(0,theCurAdvIntf->lnk_id) 5 
sockbuild_in(0,theCurAdvIntf->lnk_data), 
sockbuild_in(0, ADV RTR(theCurAdv)))); 

#endif 
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theCurNbr = FirstNbr(inIntf); 
while (theCurNbr != NULL) 

{ 

if (NBR_ID(theCurNbr) = ADV_RTR(theCurAdv)) 

{ 

theCurNbr->nbr_addr = 

sockdup(sockbuild_in(0 5 theCurAdvIntf->lnk_data)); 
return(theCurNbr) ; 

} 

theCurNbr = theCurNbr->next; 

} 

return(NULL); 

} 

nfwd_flag_desc_t * rospf_find_entry_by_addr(struct INTF * inlntf,u_int32 inNbrAddr) 

{ 

u_int32 theMac; 
booleant isDone; 
int thelndex; 

theMac = ROSPF_CONVERT_IP_TO_MAC(inIntf,inNbrAddr); 
isDone = BFALSE; 
thelndex = 0; 

while (isDone == B_FALSE) 
{ 

if (thelndex >= sNumElements) 

{ 

return(NULL); 

} 

if(sBuffer->entries[theIndex]. destination = theMac) 

{ 

return(&sBuffer->entries [thelndex] ) ; 

} 

thelndex-H-; 

} 



u_int32 ROSPF_CONVERT_MAC_TO_IP(struct INTF * inlntf, u_int32 inMac) 

{ 

u_int32 theHostNet; 
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theHostNet = ntohl(INTF_NET(inIntf)); 
return( htonl(theHostNet | (inMac)) ); 

} 

u_int32 ROSPF_CONVERT_IP_TO_MAC(struct INTF * inlntf,u_int32 inlp) 
{ 

u_int32 theHostAddr; 
u_int32 theHostNet; 

theHostAddr = ntohl(inlp); 

theHostNet = ntohl(INTF_NET(inIntf)); 

return ( theHostAddr & -theHostNet); 

} 



void rospf_save_cluster_role(stmct NBR * inNbr,nfwd_flag_desc_t * inRoute) 

{ 

if ( inRoute->flags & nfwd_rlflags_NBR_HEAD ) 
{ 

inNbr->nbr_flags |= NBRRADIONBRHEAD; 

} 

if ( inRoute->flags & nfwd rlflags NBR MEMBER ) 
{ 

inNbr->nbr_flags |= NBR RADIO NBR MEMBER; 

} 

if ( inRoute->flags & nfwd_rlfiags_CURNODE_HEAD ) 

{ 

inNbr->nbr_flags |= NBR_RADIO_CURNODE_HE AD ; 

} 

if ( inRoute->flags & nfwd_rlfiags_CURNODE_MEMBER) 

{ 

inNbr->nbr_fiags |= NBR RADIO CURNODE MEMBER; 

} 

} 



boolean_t rospf_is_role_different(struct NBR * inNbr,nfwd_flag_desc_t * inRoute ) 

{ 

if ( ( inRoute->flags & nfwd_rlflags_NBR_HEAD ) 
&& !(inNbr->nbr_fiags & NBR RADIO NBR HEAD)) 

{ 
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return(B_TRUE); 

} 

if ((inRoute->flags & nfwd_rlflags_NBR_MEMBER) 
&& !(inNbr->nbr_flags & nfwd_rlflags_NBR_MEMBER)) 

{ 

return(B_TRUE); 

} 

if ((inRoute->flags & nfwd_rlflags_CURNODE_HEAD) 
&& !(inNbr->nbr_flags & NBR_RADIO_CURNODE_HEAD)) 

{ 

retum(B_TRUE); 

} 

if ((inRoute->flags & nfwd_rlflags_CURNODE_MEMBER) 
&& !(inNbr->nbr_flags & NBR_RADIO_CURNODE_MEMBER)) 

{ 

retum(B_TRUE); 

} 

return(B_FALSE); 



#endif 
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ospf_states.c 



#defineINCLUDE_TIME 
#include "include.h" 
#include "inet.h" 
#include "ospf.h" 

#ifdefROSPF 
#include <syst/nfwd.h> 
#endif 

/***************************************************************************** 
* 
* 

* STATE TRANSITION SUPPORT ROUTINES 

* 

****************************************************************************** 



* 
* 

* NEIGHBOR STATE TRANSITIONS 

* 



static const char *ospf_nbr_events[] = { 
"Hello Received", 
"Start", 

"Two Way Received", 
"Adjacency OK", 
"Negotiation Done", 
"Exchange Done", 
"Sequence # Mismatch", 
"Bad LS Request", 
"Loading Done", 
"One way", 
"Reset Adjacency", 
"Kill Neighbor", 
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"Inactivity Timer", 
#ifdefROSPF 

"Lower Level Down", 

"Lower Level Up" 
#else 

"Lower Level Down" 
#endif 

}; 

const char *ospf_nbr_states[] = { 
"Down", 
"Attempt", 
"Init", 

"Two Way", 

"Exch Start", 

"Exchange", 

"Loading", 

"Full", 

"SCVirtual" 

}; 



#definemsg_event_nbr(nbr, event, old) \ 

if (TRACE_TF(ospf.trace_options, TR STATE)) { \ 
trace_only_tf(ospf.trace_options, \ 
TRC_NL_AFTER,\ 

("OSPF TRANSITION Neighbor %A EVENT %s %10s -> %- 

10s", \ 

(nbr)->nbr_addr, \ 
ospf_nbr_events[event], \ 
ospf_nbr_states[old], \ 
ospf_nbr_states[(nbr)->state])); \ 



static void 

NErr_PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 
} 



static void 

NHello _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 
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u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 

u_int32 nh_addr = (NBR_ADDR(nbr)) ? NBR_ADDR(nbr) : NBRJD(nbr); 



reset_inact_tmr(nbr) ; 
nbr->state = NINIT; 
intf->nbrlcnt++; 
ospf.nbrIcnt++; 
area->nbrlcnt++; 

OSPF_NH_ALLOC(nbr->nbr_nh = ospf_nh_add(nbr->intf->ifap, 

nh_addr, 
NH_NBR)); 

msg_event_nbr(nbr, HELLO_RX, oldstate); 
nbr->events-H-; 

} 

static void 

NStart _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 

nbr->state = NATTEMPT; 
if (intf->pri) 

send_hello(intf, nbr, FALSE); 
reset_inact_tmr(nbr) ; 

msg_event_nbr(nbr, START, oldstate); 
nbr->events++; 

} 



static void 

N2Way_PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
nbr->state = N2WAY; 

if ((intf->type <= NONBROADCAST) && (intf->state > IPOINT_TO_POINT)) { 
(*(if_trans[NBR_CHANGE] [intf->state])) (intf); 
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} 



msg_event_nbr(nbr, TWO WAY, oldstate); 
nbr->events++; 

if ((intf->type > NONBROADCAST && intf->type <= VIRTU AL_LINK) || 
((nbr->state = N2WAY && intf->type < POINT_TO_POINT) && 
(intf->dr = nbr || intf->bdr = nbr || 
intf->dr = &intf->nbr || intf->bdr = &intf->nbr))) 
(*(nbr_trans[ADJ_OK][nbr->state]» (intf, nbr); 

} 



static void 

NAdjOk_PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 

nbr->state = NEXSTART; 

nbr->seq = time_sec; 

nbr->I_M_MS = (bit J | bit_M | bit_MS); 

send_dbsum(intf, nbr, 0); 

msg_event_nbr(nbr, ADJOK, oldstate); 
nbr->events++; 

} 



static void 

NNegDone _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 



intf->nbrEcnt++; 

area->nbrEcnt++; 

ospf.nbrEcnt++; 

if (build_dbsum(intf, nbr)) { 
intf->nbrEcnt— ; 
area->nbrEcnt~; 
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ospf.nbrEcnt--; 
return; 

} 

nbr->state = NEXCHANGE; 
msg_event_nbr(nbr, NEGO_DONE, oldstate); 
nbr->events++; 

} 



static void 

NExchDone _PF2(intf, struct INTF *, 
nbr, struct NBR *) 



u_int oldstate = nbr->state; 



if (nbr->mode = MASTER) { 

if (nbr->dbsum != LSDB SUM NULL) 
freeDbSum(nbr); 

} else { 

nbr->mode = SLAVEHOLD; 
set_hold_tmr(nbr); 

} 

nbr->state = NLOADING; 
msg_event_nbr(nbr, EXCHDONE, oldstate); 
nbr->events++; 

if(NO_REQ(nbr)) 

(*(nbr_trans[LOAD_DONE][nbr->state])) (intf, nbr); 

} 



static void 

NBadReq _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 



freeDbSum(nbr); 
REM_NBR_RETRANS (nbr) ; 
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freeLsReq(nbr); 
if (intf->nbrlcnt — 1) { 
free AckList (intf) ; 

} 

if (nbr->state = NFULL) { 
intf->nbrFcnt~; 
area->nbrFcnt--; 
ospf.nbrFcnt—; 

if ((intf->type <= NONBROADCAST) && (intf->state >= IDr)) 
BIT_SET(intf->fiags, OSPF_INTFF_NBR_CHANGE); 

else if (intf->type = POINT_TO_POINT || intf->type = VIRTU AL LINK) 
area->build_rtr = TRUE; 

} 

if(nbr->state>=NEXCHANGE) { 
intf->nbrEcnt~; 
' area->nbrEcnt~; 
ospf.nbrEcnt--; 

} 

nbr->state = NEXSTART; 
#ifdef notdef 

intf->nbrEcnt— ; 

area->nbrEcnt— ; 

ospf.nbrEcnt--; 
#endif 

nbr->seq - time_sec; 

nbr->I_M_MS = (bit_I | bit_M | bit_MS); 

send_dbsum(intf, nbr, 0); 

msg_event_nbr(nbr, BAD_LS_REQ, oldstate); 
nbr->events++; 

} 



static void 

NBadSq _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 



freeDbSum(nbr); 
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REMNBRRETRANS(nbr); 
freeLsReq(nbr); 

if(intf->nbrlcnt= 1) { 
freeAckList(intf); 

} 

if (nbr->state = NFULL) { 
intf->nbrFcnt— ; 
area->nbrFcnt— ; 
ospf.nbrFcnt--; 

if ((intf->type <= NONBROADCAST) && (intf->state >= DDr)) 
BIT_SET(intf->flags, OSPF_INTFF_NBR_CH AN GE) ; 

else if (intf->type = POINT_TO_POINT || intf->type = VIRTUALLINK) 
area->build_rtr = TRUE; 

} 

if(nbr->state>=NEXCHANGE) { 
intf->nbrEcnt~; 
area->nbrEcnt— ; 
ospf.nbrEcnt—; 

} 

#ifdefROSPF 

if (BIT_TEST(nbr->nbr_fiags, NBR RADIO ACTIVE)) { 
assert(intf->state == IRADIO_MULTIPOINT); 
assert(intf->rospf_nbr_active_count > 0); 

intf->rospf_nbr_active_count~; 
BIT_RESET(nbr->nbr_flags, NBR_RADIO_ACTIVE); 
BIT_SET(intf->flags, OSPF_INTFF _NEW_NBR_ED_LEARNED); 
trace_log_tf(ospf.trace_options, 
0, 

LOG_INFO, 

("ROSPF: Nbr %A (id %A) now inactive", 

nbr->nbr_addr, 

nbr->nbr_id)); 

if (!(BIT_TEST(intf->dr->nbr_flags, NBR_RADIO_ACTIVE)) && 
NBR_ADDR(intf->dr) != INTF_ADDR(intf)) { 
struct NBR *theNbr; 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 
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("ROSPF: searching for new dr")); 

} 

theNbr = FirstNbr(intf); 
while (theNbr != NULL) 
{ 

if ( BIT_TEST(theNbr->nbr_flags,NBR_RADIO_ACTrVE) || 
NBR ADDR(theNbr) = INTFADDR(intf)) { 

assert(NBR_ADDR(theNbr) != (u_int32) 0); 
theNbr->dr = NBR_ADDR(theNbr); 

trace_log_tf(ospf.trace_options, 
0, 

LOGJNFO, 

("ROSPF: DR change from nbr addr %A (ID %A) to addr %A (ID 

%A)", 

intf->dr->nbr_addr, 

intf->dr->nbr_id, 

theNbr->nbr_addr, 

theNbr->nbr_id)); 
intf->dr = theNbr; 
rospf_spoof_net_lsa(intf); 
break; 

} 

theNbr = theNbr->next; 

} 

set_rospf_buildnet_tmr(intf,ROSPF_BUILDNET_INTERVAL); 
rospf_spoof_net_lsa(intf); 

} 

#endif 

nbr->state = NEXSTART; 

nbr->seq = time_sec; 

nbr->I_M_MS = (bit_I | bit_M | bit_MS); 

send_dbsum(intf, nbr, 0); 

msg_event_nbr(nbr, SEQ_MISMATCH, oldstate); 
nbr->events++; 

} 

static void 

NLoadDone _PF2(intf, struct INTF *, 
nbr, struct NBR *) 
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{ 

u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 

nbr->state = NFULL; 
intf->nbrFcnt++; 
area->nbrFcnt++; 
ospfnbrFcnt++; 

area->build_rtr = TRUE; 
if(intf->state==IDr) 

BIT_SET(intf->flags, OSPF_INTFF_BUILDNET) ; 

msg_event_nbr(nbr, LOADDONE, oldstate); 
nbr->events++; 

} 

static void 

NlWay _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 

rem_hold_tmr(nbr); 

if (nbr->state = NFULL) { 
intf->nbrFcnt— ; 
area->nbrFcnt~; 
ospf.nbrFcnt--; 

if ((intf->type <= NONBROADCASt) && (intf->state >= IDr)) 
BIT_SET(intf->flags, OSPF INTFF NBR CHANGE); 

else if (intf->type = POINT_TO_POINT || intf->type = VIRTUAL_LINK) 
area->build__rtr = TRUE; 

} 

if(nbr->state>=NEXCHANGE) { 
intf->nbrEcnt— ; 
area->nbrEcnt~; 
ospf.nbrEcnt--; 

} 

nbr->state = N1NIT; 
nbr->mode = 0; 
nbr->seq = 0; 
nbr->dr = 0; 
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nbr->bdr = 0; 



freeDbSum(nbr); 
REM_NBR_RETRANS(nbr); 
freeLsReq(nbr); 
if(intf->nbrlcnt== 1) { 
freeAckList(intf) ; 

} 

msg_event_nbr(nbr, ONEWAY, oldstate); 
nbr->events++; 

} 

static void 

NRstAd _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
struct AREA *area = intf->area; 

rem_hold_tmr(nbr); 

if(nbr->state = NFULL) { 
intf->nbrFcnt~; 
area->nbrFcnt— ; 
ospf.nbrFcnt— ; 

} 

if (nbr->state >= NEXCHANGE) { 
intf->nbrEcnt~; 
area->nbrEcnt— ; 
ospf.nbrEcnt-; 

} 

nbr->state = N2WAY; 
nbr->mode = 0; 
nbr->seq = 0; 

freeDbSum(nbr); 

REM_NBR_RETRANS(nbr); 

freeLsReq(nbr); 

if(intf->nbrlcnt=l) { 
freeAckList(intf); 

} 
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msg_event_nbr(nbr, RSTADJ, oldstate); 
nbr->events++; 



#ifdefROSPF 

if (intf->type = RADIO_MULTIPOINT) 
(*(nbr_trans[ADJ_OK][nbr->state])) (intf, nbr); 
#endif 



if ((intf->type > NONBROADCAST && intf->type <= VIRTUALLINK) || 
((nbr->state = N2WAY && intf->type < POINT_TO_POINT) && 
(intf->dr = nbr || intf->bdr = nbr || 
intf->dr = &intf->nbr || intf->bdr = &intf->nbr))) 
(*(nbr_trans[ADJ_OK][nbr->state])) (intf, nbr); 

} 



static void 

NDown _PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

u_int oldstate = nbr->state; 
struct NBR *n; 

struct AREA *area = intf->area; 

nbr->state = NDOWN; 

#ifdefROSPF 
if(intf->type = RADIO_MULTIPOINT) { 
if (TRACE_TF(ospf.trace_options, TR_STATE)) { 
trace_only_tf(ospf.trace_options, 
TRCNLAFTER, 

("OSPF TRANSITION Neighbor %A EVENT %s %10s -> %-10s", 

nbr->nbr_addr, 

"Lower Layer Down", 

ospfnbrstates [oldstate] , 

ospf_nbr_states[nbr->state])); 

} 

} 

else { 

msg_event_nbr(nbr, INACT TIMER, oldstate); 

} 

#else 

msg_event_nbr(nbr, INACT TIMER, oldstate); 
#endif 
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nbr->events++; 



rem_hold_tmr(nbr) ; 
rem_inact_tmr(nbr); 



freeDb S um(nbr) ; 
REM_NBR_RETRANS(nbr); 
freeLsReq(nbr); 
if(intf->nbrlcnt== 1) { 
freeAckList(intf); 

} 

if (oldstate > NATTEMPT) { 
intf->nbrlcnt~; 
ospf.nbrlcnt— ; 
area->nbrlcnt— ; 

} 

if(oldstate = NFULL) { 
intf->nbrFcnt~; 
area->nbrFcnt— ; 
ospf.nbrFcnt-; 

} 

if (oldstate >= NEXCHANGE) { 
intf->nbrEcnt— ; 
area->nbrEcnt~; 
ospf.nbrEcnt--; 

} 

#ifdefROSPF 
if ( intf->type != RADIO_MULTIPOINT) 
ospfnh _free(&nbr->nbr_nh) ; 
#else 

ospfnh _free(&nbr->nbr_nh); 
#endif 



if (intf->type > BROADCAST) { 
nbr->mode = 0; 
nbr->seq = 0; 



#ifdefROSPF 
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if ( intf->type != RADIO_MULTIPOINT) 
{ 

#endif 



if(intf->type != VIRTU AL_LINK) { 
if (nbr->nbr_id) { 

sockfree(nbr->nbr_id) ; 
nbr->nbr_id = (sockaddr un *) 0; 

} 

} else { 

if (nbr->nbr_addr) { 

sockfree(nbr->nbr_addr) ; 
nbr->nbr_addr = (sockaddr_un *) 0; 

} 

} 

nbr->dr = nbr->bdr = 0; 
if(nbr = intf->dr) { 

intf->dr = NBRNULL; 

intf->nbr.dr = 0; 

} 

if(nbr = intf->bdr) { 
intf->bdr = NBRNULL; 
intf->nbr.bdr = 0; 

"} 

#ifdefROSPF 
} 

#endif 
} 

else { 

if(nbr = intf->dr) { 

intf->dr = NBRNULL; 
intf->nbr.dr = 0; 

} 

if(nbr = intf->bdr) { 

intf->bdr = NBRNULL; 
intf->nbr.bdr = 0; 

} 

for (n = &intf->nbr; n != NBRNULL; n = n->next) { 
if (n->next = nbr) { 

n->next = nbr->next; 
ospf_nbr_delete(intf, nbr); 
nbr = NBRNULL; 

#ifdef notdef 
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#endif 

} 



} 



ospf.nbrsbnotvalid = TRUE; 
break; 



} 

assert(nbr = NBRNULL); 

} 

if ((intf->type <= NONBROADCAST) && (intf->state >= IDr)) 
BIT_SET(intf->flags, OSPFINTFFNBRCH ANGE) ; 

else if (intf->type = POINT_TO_POINT || intf->type = VIRTU AL LINK) 
area->build_rtr = TRUE; 



#ifdefROSPF 



static void 

NRAdjOk_PF2(intf, struct INTF *, 
nbr, struct NBR *) 

{ 

intf->nbrlcnt++; 

ospf.nbrIcnt++; 

intf->area->nbrlcnt++; 

if (TRACE JTF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

( H ROSPF: NRAdjOk: transitioning to ADJ_OK for neighbor %A (id %A)", 

nbr->nbr_addr 5 

nbr->nbr_id)); 

} 

if (!nbr->nbr_nh) 
OSPF_NH_ALLOC(nbr->nbr_nh = ospf_nh_add(nbr->intf->ifap, 

NBR_ADDR(nbr), 
NH_NBR)); 

(*(nbr_trans[ADJ_OK][nbr->state])) (intf, nbr); 

} 
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PROTOTYPE(nbr_trans[NNBR_EVENTS][NNBR_STATES], 
void, 

(struct INTF *, 
struct NBR *)) = { 

NHello, NHello, NErr, NErr, NErr, NErr, NErr, NErr }, 

NStart.NErr, NErr, NErr, NErr, NErr, NErr, NErr}, 

NErr, NErr, N2Way, NErr, NErr, NErr, NErr, NErr}, 

NErr, NErr, NErr, NAdjOk, NErr, NErr, NErr, NErr}, 
NErr, NErr, NErr, NErr, NNegDone, NErr, NErr, NErr}, 

NErr, NErr, NErr, NErr, NErr, NExchDone, NErr, NErr }, 

NErr, NErr, NErr, NBadSq, NBadSq, NBadSq, NBadSq, 
NBadSq }, 

NErr, NErr, NErr, NErr, NErr, NBadReq, NBadReq, NBadReq }, 

NErr, NErr, NErr, NErr, NErr, NErr, NLoadDone, NErr }, 

NErr, NErr, NErr, NlWay, NlWay, NlWay, NlWay, 
NlWay }, 



NErr, NErr, 


NErr, NErr, 


NRstAd, 


NRstAd, 


NRstAd, 


NRstAd}, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown }, 










NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown }, 










NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown } , 










NRAdjOk,NErr, NErr, 


NErr, NErr, 


NErr, NErr, 


NErr}, 





#else 



PROTOTYPE(nbr_trans[NNBR_EVENTS][NNBR_STATES], 
void, 

(struct INTF *, 
struct NBR *)) = { 

NHello, NHello, NErr, NErr, NErr, NErr, NErr, NErr}, 

NStart,NErr, NErr, NErr, NErr, NErr, NErr, NErr}, 

NErr, NErr, N2Way, NErr, NErr, NErr, NErr, NErr}, 

NErr, NErr, NErr, NAdjOk, NErr, NErr, NErr, NErr}, 
NErr, NErr, NErr, NErr, NNegDone, NErr, NErr, NErr}, 

NErr, NErr, NErr, NErr, NErr, NExchDone, NErr, NErr }, 

NErr, NErr, NErr, NBadSq, NBadSq, NBadSq, NBadSq, 
NBadSq }, 

NErr, NErr, NErr, NErr, NErr, NBadReq, NBadReq, NBadReq }, 

NErr, NErr, NErr, NErr, NErr, NErr, NLoadDone, NErr }, 
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/ 
\ 




NErr, NlWay, NlWay, NlWay, NlWay, 




VH i w <xy j , 












/ 
\ 


MTnrr XTPrr 
i>i nix , i>i J_/i i , 


NRrr N~Rrr 


NRstAd 


NRstAd 


NRstAd 


NRstAd \ 


/ 

I 


NDnwn 

J. 1 J--' W VV 11, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 




NDown, 


NDown }, 










{ 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 




NDown, 


NDown }, 










{ 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 


NDown, 




NDown, 


NDown }, 











}; 



#endif 



* 

* INTERFACE STATE TRANSITIONS 

* 

***************************************** 



static const char *ospf_intf_types[] = { 
it ii 

"Broadcast", 
"Nonbroadcast", 
"Point To Point", 
"Virtual" 

}; 

static const char *ospf_intf_events[] = { 
"Interface Up", 
"Wait Timer", 
"Backup Seen", 
"Neighbor Change", 
"Loop Indication", 
"Unloop Indication", 

#ifdefROSPF 

"Interface Down", 

"ROSPF Build Timer" 
#else 
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"Interface Down" 
#endif 

}; 



const char *ospf_intf_states[] = { 
"Down", 
"Loopback", 
"Waiting", 
"P To P", 
"DR", 

"BackupDR", 
#ifdefROSPF 

"DR Other", 

"Radio Multi-point" 
#else 

"DR Other" 
#endif 

}; 



#definemsg_event_intf(intf, event, cur) \ 

if (TRACE_TF(ospf.trace_options, TR_STATE)) { \ 
trace_only_tf(ospf.trace_options, \ 
TRC_NL_AFTER,\ 

("OSPF TRANSITION %s Interface %A EVENT %s %-8s -> %8s", \ 
ospf_intf_types[(intf)->type], \ 

(intf)->type = VIRTU AL LINK ? (intf)->nbr.nbr_addr: (intf)->ifap- 

>ifa_addr, \ 

ospf_intf_events[event], \ 
ospfintfstates [cur] ,\ 
ospfintfstates [(intf)->state]) ; )\ 

} 

static void 

IErr _PFl(intf, struct INTF *) 

{ 
} 

static void 

IUp _PFl(intf, struct INTF *) 

{ 

uint oldstate = intf->state; 
struct AREA *a = intf->area; 
struct NBR *n; 
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switch (intf->type) { 
case BROADCAST: 

intf->state = IWAITING; 

send_hello(intf, 0, FALSE); 

start_wait_tmr(intf); 

break; 

case POINT_TO_POINT: 

reset_inact_tmr(&intf->nbr); 
intf->state = IPOINT_TO_POINT; 
send_hello(intf, 0, FALSE); 
break; 

case VIRTU ALLINK: 

intrastate = IPOINT_TO_POINT; 

BIT_SET(intf->trans_area->area_flags, OSPFAREAFVIRTUALUP); 

ospf.vUPcnt-H-; 

send_hello(intf, 0, FALSE); 

break; 

case NONBROADCAST: 
if (intf->pri) { 

intf->state = IWAITING; 

start_wait_tmr(intf) ; 
} else 

intf->state = IDrOTHER; 
for (n = intf->nbr.next; n != NBRNULL; n = n->next) 

(*(nbr_trans[START][n->state])) (intf, n); 
break; 



#ifdefROSPF 

case RADIO_MULTIPOINT: 
{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TRJtOSPF, 
0, 

("ROSPF: IUp: intf %A. Adding ourselves to nbr list", 
intf->ifap->ifa_addr)); 

} 

intf->state = IRADIO_MULTIPOINT; 

n = (struct NBR *) task_block_alloc(ospfnbr_index); 
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n->nbr_id = sockdup(ospf.router_id); 
n->nbr_addr = sockdup(intf->ifap->ifa_addr); 
n->intf = intf; 
ospf_nbr_add(intf,n); 

intf->dr = n; 

n->dr = n->nbr_addr; 

trace_tf(ospf.trace_options, 

TR_ROSPF 5 

0, 

("ROSPF: DR initially set to addr %A (ID %A) M , 

intf->dr->nbr_addr, 

intf->dr->nbr_id)); 

if (intf->rospf_spoof_timer) { 
set_rospf_spoof_tmr(intf, intf->rospf_spoof_timer); 

} 

else { 

set_rospf_spoof_tmr(intf,ROSPF_SPOOF_INTERVAL); 

} 

break; 

} 

#endif 



} 



#ifdef ROSPF 

if (TRACE_TF(ospf.trace_options, TR ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("IUp: setting rtr sched, lock time %d cur time %d", 
ospf.backbone.lock_time, time_sec)); 

} 

#endif 

if (intf->type != VIRTU AL_LINK) 
a->build_rtr = TRUE; 

else 

set_rtr_sched(&ospf.backbone); 
intf->events++; 
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a->ifUcnt++; 

msg_event_intf(intf, INTF_UP, oldstate); 
intf->up_time = time_sec; 

} 



static void 

IDown _PFl(intf, struct INTF *) 
{ 

u_int oldstate = intf->state; 
struct NBR *n, *next_nbr; 
struct AREA *a = intf->area; 

intf->state = IDOWN; 

rem_wait_tmr(intf); 
reset_net_sched(intf); 
intf->nbr.dr = 0; 
intf->nbr.bdr = 0; 
intf->dr = NBRNULL; 
intf->bdr = NBRNULL; 

freeAckList(intf); 

msg_event_intf(intf, INTFDOWN, oldstate); 

for (n = FirstNbr(intf); n != NBRNULL; n = next_nbr) { 
nextnbr = n->next; 

#ifdefROSPF 

if (TRACE_TF(ospf.trace_options, TR_STATE)) { 
trace_only_tf(ospf.trace_options, 
TRC_NL_AFTER, 

("OSPF TRANSITION Neighbor %A EVENT %s in state %1 0s", 

n->nbr_addr, 

"Kill Nbr", 

ospf_nbr_states[n->state])); 

} 

#endif 

(*(nbr_trans[KILL_NBR][n->state])) (intf, n); 

} 



if (intf->type <= NONBROADCAST && intf->nbrlcnt = 0) { 
(*(if_trans[NBR_CHAN GE] [intf->state])) (intf); 
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a->build_rtr = TRUE; 

} 

if (intf->type = VIRTUALLINK) { 

BIT_SET(intf->trans_area->area_flags, OSPF_AREAF_VIRTUAL_UP); 
ospf.vUPcnt--; 

} 

a->ifUcnt~; 
intf->events++; 

} 



static void 

ILoop _PFl(intf, struct INTF *) 

{ 
} 



static void 

IUnLoop _PFl(intf, struct INTF *) 

{ 
} 

static void 

IWaitTmr_PFl(intf, struct INTF *) 
{ 

u_int oldstate = intf->state; 
struct AREA *a = intf->area; 

ospf_choose_dr(intf); 

a->build_rtr = TRUE; 

msg_event_intf(intf, WAIT_TIMER, oldstate); 

if (oldstate != intf->state) 
intf->events++; 

} 



static void 

fflackUp _PFl(intf, struct INTF *) 
{ 

u_int oldstate = intf->state; 
struct AREA *a = intf->area; 
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rem_wait_tmr(intf); 
ospf_choose_dr(intf); 
a->build_rtr = TRUE; 

msg_event_intf(intf, BACKUPSEEN, oldstate); 

if (oldstate != intf->state) 
intf->events++; 

} 



static void 

INbrCh _PFl(intf, struct INTF *) 

{ 

uint oldstate = intf->state; 
struct AREA *a = intf->area; 

BIT_RESET(intf->flags, OSPFINTFFNBRCHANGE); 

if (intf->type > NONBROADCAST) 

return; 
ospf_choose_dr(intf); 

a->build_rtr = TRUE; 

msg_event_intf(intf, NBR CHANGE, oldstate); 

if (oldstate != intf->state) 
intf->events++; 

} 



#ifdefROSPF 

void IRNbrCh _PFl(intf, struct INTF *) 

{ 

boolean_t isOk; 
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booleant isOldHead; 
nfwd_flag_desc_t * theNode; 
u_int32 thelp; 
u_int32 theMac; 
struct NBR * theNbr; 
struct LSDB * theRLA; 

#ifdef ROSPF_DEBUG 
if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Retrieving NTDR Forwarding Table")); 

} 

#endif 



isOldHead = B_FALSE; 

if ( OSPF_INTFF_RADIO_CLUSTER_HEAD & intf->flags) 
{ 

isOldHead = BTRUE; 

} 

intf->flags = intf->flags & -OSPF INTFF RADIO CLUSTER HEAD; 



Bring up new adjacencies 

theNbr = (struct NBR *) NULL; 

rospf_get_intranet_topology(intf); 

isOk = rospf_get_next_entry(intf,&theNode); 

while (isOk = B_TRUE) 

{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF) && 

theNode->flags != nfwd_rlflags_CURNODE_MEMBER) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Handling Neighbor %d, flags %x", 

theNode->destination, 

theNode->flags)); 

} 

if (theNode->flags & nfwd_rlflags_NBR_DIRECT) 
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{ 

thelp = ROSPF_CONVERT_MAC_TO_IP(intf,theNode->destination); 

if ( (theNbr = rospf_find_nbr_by_addr(intf,theIp)) = NULL) 
{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Direct Neighbor up %d", 
theNode->destination)) ; 

} 

theNbr = (struct NBR *) task_block_alloc(ospf_nbr_index); 

theNbr->nbr_addr = sockdup(sockbuild_in(0, thelp)); 
theNbr->intf = intf; 
ospf_nbr_add(intf, theNbr); 
theNbr->state = N2WAY; 

(*(nbr_trans[ADJ_OK][theNbr->state])) (intf, theNbr); 
rospf_save_cluster_role(theNbr,theNode); 
if (theNode->flags & nfwd_rlflags_CURNODE_HEAD) 
{ 

intf->fiags = intf->flags | OSPFINTFFRADIOCLUSTERHEAD; 
#ifdef ROSPFDEBUG 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Setting OSPF INTFF RADIO CLUSTER HEAD for 

interface")); 

} 

#endif 

} 

} 



else if ( (theNbr->nbr_id !=0 ) && 

!(theNbr->nbr_flags & NBR_RADIO_ACTIVE) && 
(theNbr->state == NDOWN) ) 

{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Direct Neighbor %d up", 
theNode->destination)) ; 
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if (((theRLA = FindLSA(intf->area, 

NBRJD(theNbr), 
NBRJD(theNbr), 
LS RTR, 0)) != LSDBNULL) && 
(ADVAGE(theRLA) < Max Age)) 

{ 

if (TRACE_TF(ospf.trace_options, TRROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: found Router Links Adv")); 

} 

BIT_SET(theNbr->nbr_flags, NBR_RADIO_ACTIVE); 
intf->rospf_nbr_active_count++; 

BIT_SET(intf->flags, OSPF_INTFF_NEW_NBR_ID_LEARNED); 
trace_log_tf(ospf.trace_options, 
0, 

LOGJNFO, 

("ROSPF: Nbr %A (id %A) now active", 
theNbr->nbr_addr, 
theNbr->nbr_id)); 
if (NBRADDR(theNbr) < NBR_ADDR(intf->dr)) { 
theNbr->dr = NBR_ADDR(theNbr); 

trace_log_tf(ospf.trace_options, 

0, 

LOGJNFO, 

("ROSPF: DR change from nbr addr %A (ID %A) to addr %A (ID 

%A)", 

intf->dr->nbr_addr, 
intf->dr->nbr_id, 
theNbr->nbr_addr, 
theNbr->nbr_id)); 
intf->dr = theNbr; 
} else 

theNbr->dr = NBR_ADDR(intf->dr); 
set_rospf_builo^et_tmr(intf,ROSPF_BUILDNET_INTERVAL); 
rospf_spoof_net_lsa(intf); 

} 

if(!theNbr->nbr_nh) 

OSPF_NH_ALLOC(theNbr->nbr_nh = ospf_nh_add(theNbr->intf->ifap, 

NBRADDR(theNbr) , 
NHNBR)); 

theNbr->state = N2WAY; 

(*(nbr_trans[ADJ_OK][theNbr->state])) (intf, theNbr); 
rospf_save_cluster_role(theNbr,theNode); 
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if (theNode->flags & nfwd_rlflags_CURNODE_HEAD) 

{ 

intf->fiags = intf->flags | OSPFINTFFRADIOCLUSTERHEAD; 
#ifdef ROSPFDEBUG 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Setting OSPF_INTFF_RADIO_CLUSTER_HEAD for 



interface")); 
#endif 

} 



} 



else if ( (theNbr->nbr_id !=0 ) && 

(theNbr->state = NDOWN) ) 

{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Indirect Neighbor %d became direct", 
theNode->destination)); 

} 

if(!theNbr->nbr_nh) 

OSPF_NH_ALLOC(theNbr->nbr_nh = ospf_nh_add(theNbr->intf->ifap, 

NBRADDR(theNbr), 
NHNBR)); 

theNbr->state = N2WAY; 

(*(nbr_trans[ADJ_OK][theNbr->state])) (intf, theNbr); 
rospf_save_cluster_role(theNbr,theNode); 
if (theNode->flags & nfwd_rlfiags_CURNODE_HEAD) 
{ 

intf->flags = intf->flags | OSPF_INTFF_RADIO_CLUSTER_HEAD; 
#ifdef ROSPF_DEBUG 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Setting OSPF_INTFF_RADIO_CLUSTER_HEAD for 

interface")); 

} 

#endif 
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} 

} 

else if (theNode->flags & nfwd_rlflags_CURNODE_HEAD) 
{ 

intf->flags = intf->flags | OSPF_INTFF_RADIO_CLUSTER_HEAD; 
#ifdef ROSPF_DEBUG 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Setting OSPF_INTFF_RADIO_CLUSTER_HEAD for 

interface")); 

} 

#endif 

} 

} 

theNbr = (struct NBR *) NULL; 

isOk = rospf_get_next_entry(intf,&theNode); 

} 



if ( intf->flags & OSPF_INTFF_RADIO_CLUSTER_HEAD ) 
{ 

rospf_reset_intranet_topology(); 

theNbr = (struct NBR *) NULL; 

isOk = rospf_get_next_entry(intf,&theNode); 

while (isOk = B_TRUE) 

{ 

thelp = ROSPF_CONVERT_MAC_TO_IP(intf,theNode->destination); 
if ( (theNbr = rospf_find_nbr_by_addr(intf,theIp)) = NULL) 

{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Indirect Neighbor up %d", 
theNode->destination)); 

} 

theNbr = (struct NBR *) task_block_alloc(ospf_nbr_index); 

theNbr->nbr_addr = sockdup(sockbuild_in(0, thelp)); 
ospf_nbr_add(intf,theNbr); 
rospf_save_cluster_role(theNbr,theNode); 

} 
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else if ( (theNbr->nbr_id !=0 ) && !(theNbr->nbr_flags & NBR_RADIO_ACTIVE) ) 
{ 

if (((theRLA = FindLSA(intf->area, 

NBR_ED(theNbr), 
NBR_ID(theNbr), 
LS_RTR, 0)) != LSDBNULL) && 
(ADV_AGE(theRLA) < MaxAge)) 

{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Indirect Neighbor up %d", 
theNode->destination)) ; 

} 

BIT_SET(theNbr->nbr_fiags, NBR_RADIO_ACTIVE); 
intf->rospf_nbr_active_count-H-; 

BIT_SET(intf->flags, OSPF_INTFF_NEW_NBR_ID_LEARNED); 
set_rospf_buildnet_tmr(intf,ROSPF_BUILDNET_INTERVAL); 
trace_log_tf(ospf.trace_options, 
0, 

LOGWARNING, 

("ROSPF: Nbr %A (id %A) now active", 
theNbr->nbr_addr, 
theNbr->nbr_id)); 
if (NBRADDR(theNbr) < NBR_ADDR(intf->dr)) { 
theNbr->dr = NBR_ ADDR(theNbr) ; 

trace_log_tf(ospf.trace_options, 
0, 

LOG_WARNING, 
("ROSPF: DR change from nbr addr %A (ID %A) to addr %A (ID 

%A)", 

intf->dr->nbr_addr, 
intf->dr->nbr_id, 
theNbr->nbr_addr, 
theNbr->nbr_id)); 
intf->dr = theNbr; 
} else 

theNbr->dr = NBR_ADDR(intf->dr); 

set_rospf_buildnet_tmr(intf,ROSPF_BUILDNET_INTERVAL); 
rospf_spoof_net_lsa(intf); 

} 

rospf_save_cluster_role(theNbr,theNode); 

} 



9657019_1 



theNbr = (struct NBR *) NULL; 

isOk = rospf get next_entry(intf,&theNode); 

} 

} 



/************************************************** 

tear down old adjacencies or reform changed ones 
************************************************ ***y 

theNbr = FirstNbr(intf); 
theNode = NULL; 
while (theNbr != NULL) 

{ 

if ( NBRADDR(theNbr) == INTF_ADDR(intf)) 
{ 

5 

} 

else if ( BIT_TEST(theNbr->nbr_flags,NBR_RADIO_ACTIVE) && 

( ((theNode=rospf_find_entry_by_addr(intf,NBR_ADDR(theNbr))) == NULL) || 
( (theNbr->state >= NEXSTART) && !(theNode->flags & 
nfwd_rlflags_NBR_DIRECT)) ) ) 

{ 

trace_log_tf(ospf.trace_options, 
0, 

LOG_INFO, 

("ROSPF: Nbr %A (id %A) now inactive", 
theNbr->nbr_addr, 
theNbr->nbr_id)); 
if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Taking Down Adjacency to %d", 
ROSPF_CONVERT_IP_TO_MAC(intf,NBR_ADDR(theNbr)))); 

} 

(*(nbr_trans[LLDOWN][theNbr->state])) (intf, theNbr); 
intf->rospf_nbr_active_count~; 

BIT_RESET(theNbr->nbr_flags,NBR_RADIO_ACTiVE); 
BIT_SET(intf->flags, OSPF INTFF NEW NBR ID LEARNED); 
set_rospf_buildnet_tmr(intf,ROSPF_BUILDNET_INTERVAL); 

} 

else if (rospf_is_role_different(theNbr,theNode) = B TRUE) 
{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
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trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Inconsistency with views of nbr's cluster role, resetting view")); 

} 

rospf_save_cluster_role(theNbr,theNode); 

if (theNode->flags & nfwd_rlflags_NBR_DIRECT ) 

{ 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Resetting Adjacency to %d", 

ROSPF_CONVERT_IP_TO_MAC(intf,NBR_ADDR(theNbr)))); 

} 

(*(nbr_trans[RST_ADJ][theNbr->state])) (intf, theNbr); 

} 

} 

theNbr = theNbr->next; 

} 



if (!(BIT_TEST(intf->dr->nbr_flags, NBR_RADIO_ACTIVE)) && 
NBR_ADDR(intf->dr) != INTF_ADDR(intf)) { 



if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: searching for new dr")); 

} 

theNbr = FirstNbr(intf); 
while (theNbr != NULL) 

{ 

if ( BIT_TEST(theNbr->nbr_flags,NBR_RADIO_ACTIVE) || 
NBR_ADDR(theNbr) = INTF_ADDR(intf)) { 

assert(NBR_ADDR(theNbr) != (u_int32) 0); 
theNbr->dr = NBR_ADDR(theNbr); 
trace_log_tf(ospf.trace_options, 
0, 

LOG_INFO, 

("ROSPF: DR change from nbr addr %A (ID %A) to addr %A (ID %A)", 
intf->dr->nbr_addr, 
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intf->dr->nbr_id, 

theNbr->nbr_addr> 

theNbr->nbr_id)); 

intf->dr = theNbr; 

rospf_spoof_net_lsa(intf); 

break; 

theNbr = theNbr->next; 

} 



#ifdef ROSPFDEBUG 
if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: Done Parsing ntdr forwarding table")); 

} 

#endif 
} 



void 

IRNLA _PF1 (intf, struct INTF *) 
{ 

u_int oldstate = intf->state; 

struct AREA *a = intf->area; 

struct NBR *n, *next_nbr; 

struct ospf_lsdb_list *trans = LLNULL; 

int rla_flags; 

assert(intf->type = RADIO JVTULTIPOINT); 
intf->rospf_buildnet_time = (time_t) 0; 

if (!(BIT_TEST(intf->flags, OSPF_INTFF_NEW_NBR_ID_LEARNED))) { 
trace_log_tf(ospftrace_options, 
0, 

LOGWARNING, 

("ROSPF: processing ROSPF build net timer when 
OSPF_INTFF_NEW_NBR_ID_LEARNED flag not set for intf %A(%s) H 5 
intf->ifap->ifa_addr, 
intf->ifap->ifa_link->ifl_name)); 

} 

for (n = FirstNbr(intf); n != NBRNULL; n = next_nbr) { 
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next_nbr - n->next; 

if(rospf_build_net_lsa(intf,n, &trans) != FLAGNOPROBLEM) { 
if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("IRNLA: restart build net timer due to rospf_build_net_lsa error, nbr %A (id 

%A)", 

n->nbr_addr, 
n->nbr_id)); 

} 

restart_rospf_buildnet_tmr(intf, 
ROSPFBUILDNETRETRYMULTIPLIER * intf->retrans_timer); 

} 

else 

intf->area->spfsched |= LS_NET; 
if (trans != LLNULL) { 
if (rospf_self_orig_nla_flood(a, intf, n, trans, LS_NET) = 
FLAG NO PROBLEM) { 
ospf _freeq((struct Q **)&trans, ospf lsdblist index); 

} 

else { 

ospf_freeq((struct Q **)&trans, ospf_lsdblist_index); 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("IRNLA: restart build net timer due to rospf_self_orig_nla_flood error, nbr 

%A (id%A)", 

n->nbr_addr, 
n->nbr_id)); 

} 

restart_rospf_buildnet_tmr(intf, 
ROSPF BUILDNET RETRY MULTIPLIER * intf->retrans_timer); 

} 

} 

} 



if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 
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("IRNLA: calling build_rtr_lsa, trans %x", 
&trans)); 

} 

rla_flags = build_rtr_lsa(a, &trans, 0); 
intf->area->spfsched |= rla_flags; 
if (trans != LLNULL) { 

self_orig_area_flood(intf->area ) trans, LS_RTR); 

ospf_freeq((struct Q **)&trans, ospf_lsdblist_index); 

} 

if (intf->rospf_nbr_active_count > 0) { 

if (BITTEST(intf->flags, OSPF_INTFF_ROSPF_TRANS_NET_BUILT) && 
rla_flags = FLAG_NO_PROBLEM) { 
if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("IRNLA: calling rospfspoofbuildnetlsa, trans %x", 
&trans)); 

} 

if (rospf_spoof_build_net_lsa(intf->area, intf, &trans, TRUE) != 
FLAG NO PROBLEM) { 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, TR ROSPF, 0, 

("ROSPF: IRNLA: defer build_rtr_lsa due to rospf_spoof_build_net_lsa 

error")); 

} 

assert(intf->rospf_spoof_time != 0); 

} 

if (trans != LLNULL) { 
intf->area->spfsched |= NETSCHED; 
rospf_area_flood(intf->area, intf, trans); 
ospf_freeq((struct Q **)&trans, ospf_lsdblist_index); 

} 

} 

else if (!(BIT_TEST(intf->flags, OSPF_INTFF_ROSPF_TRANS_NET_BUILT))) { 
if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, TR_ROSPF, 0, 

("rospf_spoof_net_lsa: defer build_rtr_lsa due to not transit net, build_rtr_lsa 

return %x", 

rlaflags)); 

} 

assert(intf->rospf_spoof_tirae != 0); 

} 

else if (rla_flags != FLAG NO PROBLEM && rla_flags != RTRSCHED) { 
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if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("ROSPF: IRNLA: spoof failed due to build_rtr_lsa return %x", 
rla_flags)); 

} 

assert(intf->rospf_spoof_time != 0); 

} 

} 

if (!intf->rospf_buildnet_time) { 

BIT_RESET(intf->flags, OSPF_INTFF_NE W_NBR_DD_LEARNED) ; 
} else { 

if (TRACE_TF(ospf.trace_options, TR_ROSPF)) { 
trace_tf(ospf.trace_options, 
TR_ROSPF, 
0, 

("IRNLA: build net timer restarted value %d", 
intf->rospf_buildnet_time)); 

} 

} 

if (intf->area->spfsched) 
ospf_spf_sched() ; 

intf->events++; 

msg_event_intf(intf, RBUILDTM, oldstate); 

} 

_PROTOTYPE(if_trans[NINTF_EVENTS][NINTF_STATES], 
void, 

(struct INTF *)) = { 

{IUp, IErr, IErr, IErr,IErr, IErr, IErr, IErr}, 

{Err, IErr, IWaitTmr.IErr, IErr, IErr, IErr, IErr}, 

{ IErr, IErr, IBackUp, IErr, IErr, IErr, IErr, IErr}, 

{ IErr, IErr, IErr, IErr, INbrCh,INbrCh, INbrCh, IRNbrCh }, 

{ ILoop,IErr, IErr, IErr, IErr, IErr, IErr, IErr}, 

{ IErr, IUnLoop, IErr, IErr, IErr, IErr, IErr, IErr}, 

{ IErr, EDown, IDown, IDown,IDown, IDown, IDown, EDown }, 

{IErr,IErr, IErr, IErr, IErr, IErr, IErr, IRNLA}, 



#else 
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PROTOTYPE(if_trans[NINTF_EVENTS][NINTF_STATES], 
void, 

(struct INTF *)) = { 
IUp, IErr, IErr, IErr, IErr, ffirr, ffirr}, 
IErr, IErr, IWaitTmr, IErr, IErr, IErr, ffirr}, 
IErr, ffirr, IBackUp, IErrJErr, IErr, IErr}, 
ffirr, ffirr, ffirr, IErr, INbrCh, INbrCh, INbrCh}, 
ILoop, ffirr, ffirr, ffirr, IErr, IErr, IErr}, 
ffirr, IUnLoopJErr, ffirr, IErr, ffirr, IErr}, 

ffirr, IDown, IDown, IDown, IDown, IDown, IDown 



#endif 
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